object DM: TDM
  OldCreateOrder = False
  Left = 255
  Top = 178
  Height = 478
  Width = 718
  object BancoEstoque: TSQLConnection
    ConnectionName = 'IBConnection'
    DriverName = 'Interbase'
    GetDriverFunc = 'getSQLDriverINTERBASE'
    LibraryName = 'dbexpint.dll'
    LoginPrompt = False
    Params.Strings = (
      'DriverName=Interbase'
      
        'Database=localhost:C:\Users\Leonardo\Desktop\doc tcc\Sistema2\Ba' +
        'nco.FDB'
      'RoleName=RoleName'
      'User_Name=sysdba'
      'Password=masterkey'
      'ServerCharSet='
      'SQLDialect=3'
      'ErrorResourceFile='
      'LocaleCode=0000'
      'BlobSize=-1'
      'CommitRetain=False'
      'WaitOnLocks=True'
      'Interbase TransIsolation=ReadCommited'
      'Trim Char=False')
    VendorLib = 'gds32.dll'
    Connected = True
    Left = 24
    Top = 24
  end
  object sdsFornecedor: TSQLDataSet
    CommandText = 'select * from FORNECEDORES'#13#10'order by FOR_NOMEFANT'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = BancoEstoque
    Left = 64
    Top = 128
  end
  object sdsMarca: TSQLDataSet
    CommandText = 'select * from MARCAS'#13#10'order by MAR_DESCRICAO'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = BancoEstoque
    Left = 64
    Top = 176
  end
  object sdsProduto: TSQLDataSet
    CommandText = 'select * from PRODUTOS'#13#10'order by PRO_DESCRICAO'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = BancoEstoque
    Left = 64
    Top = 224
  end
  object sdsVenda: TSQLDataSet
    CommandText = 'select * from VENDAS'#13#10'order by VEN_CODIGO'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = BancoEstoque
    Left = 64
    Top = 272
  end
  object sdsCompra: TSQLDataSet
    CommandText = 'select * from COMPRAS'#13#10'order by COM_CODIGO'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = BancoEstoque
    Left = 64
    Top = 320
  end
  object sdsItemVenda: TSQLDataSet
    CommandText = 'select * from ITEM_VENDA'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = BancoEstoque
    Left = 400
    Top = 80
  end
  object sdsItemCompra: TSQLDataSet
    CommandText = 'select * from ITEM_COMPRA'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = BancoEstoque
    Left = 400
    Top = 128
  end
  object sdsContasPagar: TSQLDataSet
    CommandText = 'select * from CONTAS_PAGAR'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = BancoEstoque
    Left = 400
    Top = 176
  end
  object sdsContasReceber: TSQLDataSet
    CommandText = 'select * from CONTAS_RECEBER'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = BancoEstoque
    Left = 400
    Top = 224
  end
  object sdsUsuario: TSQLDataSet
    CommandText = 'select * from USUARIOS'#13#10'order by USU_LOGIN'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = BancoEstoque
    Left = 400
    Top = 280
  end
  object dspFornecedor: TDataSetProvider
    DataSet = sdsFornecedor
    Left = 144
    Top = 128
  end
  object dspMarca: TDataSetProvider
    DataSet = sdsMarca
    Left = 144
    Top = 176
  end
  object dspProduto: TDataSetProvider
    DataSet = sdsProduto
    Left = 144
    Top = 224
  end
  object dspVenda: TDataSetProvider
    DataSet = sdsVenda
    Left = 144
    Top = 272
  end
  object dspCompra: TDataSetProvider
    DataSet = sdsCompra
    Left = 144
    Top = 320
  end
  object dspItemVenda: TDataSetProvider
    DataSet = sdsItemVenda
    Left = 480
    Top = 80
  end
  object dspItemCompra: TDataSetProvider
    DataSet = sdsItemCompra
    Left = 480
    Top = 128
  end
  object dspContasPagar: TDataSetProvider
    DataSet = sdsContasPagar
    Left = 480
    Top = 176
  end
  object dspContasReceber: TDataSetProvider
    DataSet = sdsContasReceber
    Left = 480
    Top = 224
  end
  object dspUsuario: TDataSetProvider
    DataSet = sdsUsuario
    Left = 480
    Top = 280
  end
  object cdsFornecedor: TClientDataSet
    Active = True
    Aggregates = <>
    Params = <>
    ProviderName = 'dspFornecedor'
    Left = 232
    Top = 128
  end
  object cdsMarca: TClientDataSet
    Active = True
    Aggregates = <>
    Params = <>
    ProviderName = 'dspMarca'
    Left = 232
    Top = 176
  end
  object cdsProduto: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspProduto'
    Left = 232
    Top = 224
  end
  object cdsVenda: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspVenda'
    Left = 232
    Top = 272
  end
  object cdsCompra: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspCompra'
    Left = 232
    Top = 320
  end
  object cdsItemVenda: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspItemVenda'
    Left = 568
    Top = 80
  end
  object cdsItemCompra: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspItemCompra'
    Left = 568
    Top = 128
  end
  object cdsContasPagar: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspContasPagar'
    Left = 568
    Top = 176
  end
  object cdsContasReceber: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspContasReceber'
    Left = 568
    Top = 224
  end
  object cdsUsuario: TClientDataSet
    Active = True
    Aggregates = <>
    Params = <>
    ProviderName = 'dspUsuario'
    Left = 568
    Top = 280
  end
  object sdsEstado: TSimpleDataSet
    Active = True
    Aggregates = <>
    Connection = BancoEstoque
    DataSet.CommandText = 'select * from UF_ESTADO'#13#10'order by UF'
    DataSet.MaxBlobSize = -1
    DataSet.Params = <>
    Params = <>
    Left = 400
    Top = 328
  end
  object sdsMunicipio: TSimpleDataSet
    Active = True
    Aggregates = <>
    Connection = BancoEstoque
    DataSet.CommandText = 
      'select * from MUNICIPIOS'#13#10'WHERE COD_UF_IBGE =  :COD_UF_IBGE'#13#10'ord' +
      'er by MUNICIPIO'
    DataSet.MaxBlobSize = -1
    DataSet.Params = <
      item
        DataType = ftInteger
        Name = 'COD_UF_IBGE'
        ParamType = ptInput
      end>
    Params = <>
    Left = 400
    Top = 376
  end
  object dsEstado: TDataSource
    DataSet = sdsEstado
    Left = 480
    Top = 328
  end
  object dsMunicipio: TDataSource
    DataSet = sdsMunicipio
    Left = 480
    Top = 376
  end
  object sdsCliente: TSQLDataSet
    CommandText = 'select * from CLIENTES'#13#10'order by CLI_NOME'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = BancoEstoque
    Left = 64
    Top = 80
  end
  object dspCliente: TDataSetProvider
    DataSet = sdsCliente
    Left = 144
    Top = 80
  end
  object cdsCliente: TClientDataSet
    Active = True
    Aggregates = <>
    Params = <>
    ProviderName = 'dspCliente'
    Left = 232
    Top = 80
  end
end
